home *** CD-ROM | disk | FTP | other *** search
- // Copyright (C) 1997-2002 Alias|Wavefront,
- // a division of Silicon Graphics Limited.
- //
- // The information in this file is provided for the exclusive use of the
- // licensees of Alias|Wavefront. Such users have the right to use, modify,
- // and incorporate this code into other products for purposes authorized
- // by the Alias|Wavefront license agreement, without fee.
- //
- // ALIAS|WAVEFRONT DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
- // INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
- // EVENT SHALL ALIAS|WAVEFRONT BE LIABLE FOR ANY SPECIAL, INDIRECT OR
- // CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE,
- // DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER
- // TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
- // PERFORMANCE OF THIS SOFTWARE.
- //
- //
- // Alias|Wavefront Script File
- // MODIFY THIS AT YOUR OWN RISK
- //
- // Creation Date: 04 January 1999
- //
- // Remove all duplicate string items from a string array. There will be
- // only one occurrence of each string item in the returned string array.
- // The argument string array is not modified.
- //
- // Examples:
- //
- // string $list[] = { d, b, c, c, a, a, b };
- // string $shorterList[] = AWRemoveDuplicateStringsFromStringArray($list);
- // // Result : { d, b, c, a } //
- //
- // Note: Use stringArrayRemoveDuplicates instead of this script.
- //
- global proc string [] AWRemoveDuplicateStringsFromStringArray(string $list[])
- {
- string $item, $result[];
- int $index = 0;
-
- for ($item in $list) {
- if (0 == AWNumberOfOccurrencesInStringArray($item, $result)) {
- $result[$index++] = $item;
- }
- }
-
- return $result;
- }
-
-